home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-06-24 | 706 b | 30 lines | [TEXT/Help] |
- { DEUX+DEUX+DEUX+NEUF+NEUF=FULL }
- (c)
-
- ;;; Variables
- (r0 f x l r1 u r2 e n d)
-
- ;;; Constraints
- ((=? (+ (* 3 x)(+ f f)) (+ l (* 10 r0)))
- (=? (+ (* 5 u) r0) (+ l (* 10 r1)))
- (=? (+ (* 5 e) r1) (+ u (* 10 r2)))
- (=? (+ (* 3 d) (+ (+ n n) r2)) f)
- (<>? f u) (<>? f l) (<>? f x) (<>? f e)
- (<>? f n) (<>? f d) (<>? u l) (<>? u x)
- (<>? u e) (<>? u n) (<>? u d) (<>? l x)
- (<>? l e) (<>? l n) (<>? l d) (<>? x e)
- (<>? x n) (<>? x d) (<>? e n) (<>? e d)
- (<>? n d) (<>? d 0) (<>? n 0) (<>? f 0))
-
- ;;; Domains
- ((0 1 2 3 4)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4 5 6 7 8 9)
- (0 1 2 3 4 5 6 7 8 9))
-